home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Glitch Apple Disk Collection
/
2014.glitch.apple.collection.zip
/
indexed
/
MASKSUNA.DSK
/
ROOM 9.0.txt
< prev
next >
Wrap
Text File
|
2014-09-09
|
2KB
|
174 lines
.S N=9
.S F=1
.S P=3-P
.C 0,P,0
._ P
.P "The two of you enter the chamber. An unseen door slams shut. Something in front of you issues a hissing sound.
.$ P
.!SLAM
.!WAIT
.!WAIT
.!SNRT
.!WAIT
.!SNRT
.P "A huge snake rises in front of you!
.L L,P7.0
.!DRW1
.E !DRW2
.E !DRW3
.E !DRW4
.E !DRW3
.E !DRW2
.E !DRW3
.E !DRW4
.E !DRW5
.3 ROOM 9.2
.!GOTO
!DRW1
.S P=3-P
.B SNAKA
.S V=P
.C 1,P,0
.D
.!SNRT
.$ P
.S P=3-P
.B SNAKB
.S V=P
.C 1,P,0
.D
.$ P
.!TEST
!DRW2
.S P=3-P
.B SNAKC
.S V=P
.C 1,P,0
.D
.$ P
.!TEST
!DRW3
.!SNRT
.S P=3-P
.B SNAKD
.S V=P
.C 1,P,0
.D
.$ P
.!TEST
!DRW4
.S P=3-P
.B SNAKE
.S V=P
.C 1,P,0
.D
.$ P
.!TEST
!DRW5
.!SNRT
.S P=3-P
.B SNAKF
.S V=P
.C 1,P,0
.D
.$ P
.!SNRT
.S P=3-P
.B SNAKG
.S V=P
.C 1,P,0
.D
.$ P
._ P
.V
.!WAIT
.P "The snake strikes. . .
.!WAIT
.!WAIT
.V
.P "Crushing coils wrap around you!
.!WAIT
.!WAIT
.!DEAD
!TEST
.I TC(14):0
.E J -2
.V 15
._ V
.P "OK>^
.S R=0
.!TIME
.T I Q:211
.E J -9
.H 3
.P "S^
.S R=0
.!TIME
.T I Q:200
.E J -15
.H 4
.P "H^
.S R=0
.!TIME
.T I Q:207
.E J -21
.H 5
.P "O^
.S R=0
.!TIME
.T I Q:207
.E J +21
.H 6
.P "O^
.S R=0
.!TIME
.T I Q:212
.E J +15
.H 7
.P "T
.!WAIT
.S R=0
.S SV(4)=0
.S SV(6)=2
.S SV(7)=140
.I E:0
.T N N
.!WAIT
.V 13
.P "You shoot the snake!
.P "Stunned and wounded, it slithers away.
.I A:A
!TIME
.S B=0
.I Q>127
.T J -3
.S B=B++
.I B<250
.T J -4
!CLRT
.C 0,P,0
.V 5
!SNRT
.I E
.T J -2
.S SV(4)=0
.S SV(7)=0
.S L=0
.S SV(6)=2
.N N
.I L<5
.T S L=L++
.T J -4
!SLAM
.I E
.T J -2
.S SV(4)=0
.S SV(6)=20
.S SV(7)=220
.N N
.S SV(4)=0
.S SV(6)=6
.S SV(7)=140
.N N
@@@@@